COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	This program will find all anagrams of one or more words.
C00005 ENDMK
C⊗;
This program will find all anagrams of one or more words.

It can either compare the input word with all words in UNABRD.DIC[lib,doc],
which takes about 8 sec. of CPU time, or with the words in POCKET.DIC[lib,doc],
in which the program uses virtually no CPU time.

To use the program, type

	r jumble

The program will prompt the user for words.  Type either a blank line
or an <escape> after the last word to indicate no more words.

If the user types the word  $  (that's a dollar sign, not an escape),
the program will use the small dictionary.


An example

    .r jumble
    Input word(s).  End with blank line or <esc>.
    Enter  $  to use small dictionary.
    => tpo
    => aimclre
    => $
    Using small dictionary. . .
    => 
    aimclre => miracle
    tpo => opt
    tpo => pot
    aimclre => reclaim
    tpo => top

    End of SAIL execution

[Note, it didn't find the word "claimer", which is in the large
dictionary but not the small one.]


Some hints on use:

1.  If the jumbled word has an "s", try entering it without the "s".  Most
    plurals are not in the dictionary.

2.  If the jumbled word has a "ies", try also entering just a "y".


Bugs:

1.  The program can only handle up to ten words.  You'll get an "invalid
    index" msg if you try to enter more than that.